home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / fgl110c.zip / 12-06.C < prev    next >
Text File  |  1992-01-31  |  801b  |  45 lines
  1. #include <fastgraf.h>
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4.  
  5. void main(void);
  6.  
  7. void main()
  8. {
  9.    int maxx, maxy;
  10.    int old_mode;
  11.  
  12.    old_mode = fg_getmode();
  13.    fg_setmode(fg_automode());
  14.  
  15.    if (fg_mouseini() < 0) {
  16.       fg_setmode(old_mode);
  17.       fg_reset();
  18.       exit(1);
  19.       }
  20.  
  21.    maxx = fg_getmaxx();
  22.    maxy = fg_getmaxy();
  23.    fg_setcolor(15);
  24.    fg_rect(0,maxx,0,maxy);
  25.  
  26.    fg_mousevis(1);
  27.    fg_mouselim(maxx/4,3*maxx/4,maxy/4,3*maxy/4);
  28.    fg_waitkey();
  29.  
  30.    fg_mousemov(0,0);
  31.    fg_waitfor(36);
  32.    fg_mousemov(maxx,0);
  33.    fg_waitfor(36);
  34.    fg_mousemov(maxx,maxy);
  35.    fg_waitfor(36);
  36.    fg_mousemov(0,maxy);
  37.    fg_waitfor(36);
  38.    fg_mousemov(maxx/2,maxy/2);
  39.    fg_mousespd(16,32);
  40.    fg_waitkey();
  41.  
  42.    fg_setmode(old_mode);
  43.    fg_reset();
  44. }
  45.